home *** CD-ROM | disk | FTP | other *** search
/ Trading on the Edge / Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin / pc / pc_files / mktdata / econdata / docutils / amiarc.exe / MASTER < prev    next >
Text File  |  1992-01-20  |  379b  |  19 lines
  1. fex tgnp$ = 0
  2. add tgnp$.sav
  3. add c$.sav 
  4. id c$ = cpc$*pop 
  5. add vf$.sav
  6. add vin$.sav
  7. id v$ = vf$ + vin$ + vif$
  8. add fi$.sav
  9. fex ceiling = 1.1
  10. f sum$ = c$ + v$ + fe$ - fi$ + g$ 
  11. f excess$ = @pos(sum$ -tgnp$*ceiling)
  12. id fi$ = fi$ + excess$
  13. id gnp$ = c$ + v$ + fe$ - fi$ + g$
  14. add pibg$.sav 
  15. f tax$ = taxrate*pibg$
  16. id pidis$ = pibg$ + gtnis$ - tax$
  17. check pidis$ .1
  18. q 
  19.